10 REM I LIED!
20 F=679
30 READ A
40 POKE F,A
50 F=F+1
60 IF A<>255 THEN 30
70 SYS 679
80 :LOAD "*",8,1
100 DATA 120,169,52,133,1
110 DATA 162,6,189,7,8
120 DATA 157,0,223,202,16
130 DATA 247,169,55,133,1
140 DATA 88,96,255